﻿Public Class AssetPredefinedFieldLookup
#Region "Properties"

    Private _selected As Boolean
    Public Property Selected As Boolean
        Get
            Return _selected
        End Get
        Set(ByVal value As Boolean)
            _selected = value
        End Set
    End Property

    Private _type As AssetFieldType
    Public Property Type As AssetFieldType
        Get
            Return _type
        End Get
        Set(ByVal value As AssetFieldType)
            _type = value
        End Set
    End Property

    Private _desc As String
    Public Property Description As String
        Get
            Return _desc
        End Get
        Set(ByVal value As String)
            _desc = value
        End Set
    End Property
#End Region

    Public Shared Function RetrieveAll() As List(Of AssetPredefinedFieldLookup)
        Dim result As New List(Of AssetPredefinedFieldLookup)

        result.Add(New AssetPredefinedFieldLookup With {.Selected = False, .Type = AssetFieldType.AssetBarcode, .Description = "Asset Barcode ID"})
        result.Add(New AssetPredefinedFieldLookup With {.Selected = False, .Type = AssetFieldType.AssetName, .Description = "Asset Name"})
        result.Add(New AssetPredefinedFieldLookup With {.Selected = False, .Type = AssetFieldType.AssetType, .Description = "Asset Type"})
        result.Add(New AssetPredefinedFieldLookup With {.Selected = False, .Type = AssetFieldType.Department, .Description = "Site/Department"})
        result.Add(New AssetPredefinedFieldLookup With {.Selected = False, .Type = AssetFieldType.ModelNo, .Description = "Model #"})
        result.Add(New AssetPredefinedFieldLookup With {.Selected = False, .Type = AssetFieldType.SerialNo, .Description = "Serial #:"})

        Return result
    End Function
End Class
